﻿Imports MySql.Data.MySqlClient

''' <summary>
''' MySQLコネクタ
''' </summary>
''' <remarks>#97　MySQL対応</remarks>
Public Class MySQLConnector
    Inherits Connector

    Public Overrides Function Connect() As System.Data.IDbConnection
        Dim cn = Me.CreateDbConnection
        cn.Open()
        Return cn
    End Function

    Private Function CreateDbConnection() As MySqlConnection
        Dim cn = New MySqlConnection
        cn.ConnectionString = Me.ConnectionString
        Return cn
    End Function
End Class
